home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 February / EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso / enigma / earcd / utility / utilwb / wbstars2.lha / WBStars2.0 / source / WBStars_libraries.c < prev    next >
C/C++ Source or Header  |  1996-12-18  |  1KB  |  35 lines
  1. /* $VER: WBStars_libraries.c 2.0 (18 Dec 1996)
  2. */
  3.  
  4. #include <proto/exec.h>
  5.  
  6. #include "WBStars_include.h"
  7. #include "WBStars_protos.h"
  8.  
  9. struct IntuitionBase    *IntuitionBase=NULL;
  10. struct GfxBase        *GfxBase=NULL;
  11. struct Library        *CxBase=NULL;
  12. struct Library        *IconBase=NULL;
  13. struct Library        *LayersBase=NULL;
  14.  
  15. char    OpenLibraries()        /* opens all needed libraries    */
  16. {                /* returns TRUE on success    */
  17.     IntuitionBase    =(struct IntuitionBase*)OpenLibrary("intuition.library",0L);
  18.     GfxBase        =(struct GfxBase*)OpenLibrary("graphics.library",0L);
  19.     CxBase        =OpenLibrary("commodities.library",37L);
  20.     IconBase    =OpenLibrary("icon.library",36L);
  21.     LayersBase    =OpenLibrary("layers.library",0L);
  22.  
  23.     if( !IntuitionBase || !GfxBase || !CxBase || !IconBase || !LayersBase )
  24.         return FALSE;
  25.     return TRUE;
  26. }
  27.  
  28. void    CloseLibraries()    /* closes all opened libraries    */
  29. {
  30.     if(IntuitionBase)    CloseLibrary((struct Library*)IntuitionBase);
  31.     if(GfxBase)        CloseLibrary((struct Library*)GfxBase);
  32.     if(CxBase)        CloseLibrary(CxBase);
  33.     if(IconBase)        CloseLibrary(IconBase);
  34.     if(LayersBase)        CloseLibrary(LayersBase);
  35. }